If the datasource of the subreport is a PC
Set CRXTables = CRXSubreport.Database.Tables
Set CRXTable = CRXTables.Item(1)
CRXTable.Location = "C:\My_Application\My_DB.mdb"
Seagate Software IMG Holdings, Inc. http://www.seagatesoftware.com Support services: http://support.seagatesoftware.com |